home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 2009 February / PCWFEB09.iso / Software / Linux / Kubuntu 8.10 / kubuntu-8.10-desktop-i386.iso / casper / filesystem.squashfs / usr / lib / perl / 5.10.0 / stdarg.ph < prev    next >
Text File  |  2008-07-24  |  3KB  |  87 lines
  1. require '_h2ph_pre.ph';
  2.  
  3. no warnings 'redefine';
  4.  
  5. unless(defined(&_STDARG_H)) {
  6.     unless(defined(&_ANSI_STDARG_H_)) {
  7.     unless(defined(&__need___va_list)) {
  8.         eval 'sub _STDARG_H () {1;}' unless defined(&_STDARG_H);
  9.         eval 'sub _ANSI_STDARG_H_ () {1;}' unless defined(&_ANSI_STDARG_H_);
  10.     }
  11.     undef(&__need___va_list) if defined(&__need___va_list);
  12.     unless(defined(&__GNUC_VA_LIST)) {
  13.         eval 'sub __GNUC_VA_LIST () {1;}' unless defined(&__GNUC_VA_LIST);
  14.     }
  15.     if(defined(&_STDARG_H)) {
  16.         eval 'sub va_start {
  17.             my($v,$l) = @_;
  18.             eval q( &__builtin_va_start($v,$l));
  19.         }' unless defined(&va_start);
  20.         eval 'sub va_end {
  21.             my($v) = @_;
  22.             eval q( &__builtin_va_end($v));
  23.         }' unless defined(&va_end);
  24.         eval 'sub va_arg {
  25.             my($v,$l) = @_;
  26.             eval q( &__builtin_va_arg($v,$l));
  27.         }' unless defined(&va_arg);
  28.         if(!defined( &__STRICT_ANSI__) || (defined(&__STDC_VERSION__) ? &__STDC_VERSION__ : undef) + 0>= 199900) {
  29.         eval 'sub va_copy {
  30.             my($d,$s) = @_;
  31.                 eval q( &__builtin_va_copy($d,$s));
  32.         }' unless defined(&va_copy);
  33.         }
  34.         eval 'sub __va_copy {
  35.             my($d,$s) = @_;
  36.             eval q( &__builtin_va_copy($d,$s));
  37.         }' unless defined(&__va_copy);
  38.         if(defined(&_HIDDEN_VA_LIST)) {
  39.         undef(&_VA_LIST) if defined(&_VA_LIST);
  40.         }
  41.         if(defined(&_BSD_VA_LIST)) {
  42.         undef(&_BSD_VA_LIST) if defined(&_BSD_VA_LIST);
  43.         }
  44.         if(defined( &__svr4__) || (defined( &_SCO_DS)  && !defined( &__VA_LIST))) {
  45.         unless(defined(&_VA_LIST_)) {
  46.             eval 'sub _VA_LIST_ () {1;}' unless defined(&_VA_LIST_);
  47.             if(defined(&__i860__)) {
  48.             unless(defined(&_VA_LIST)) {
  49.                 eval 'sub _VA_LIST () { &va_list;}' unless defined(&_VA_LIST);
  50.             }
  51.             }
  52.             if(defined(&_SCO_DS)) {
  53.             eval 'sub __VA_LIST () {1;}' unless defined(&__VA_LIST);
  54.             }
  55.         }
  56.         } else {
  57.         if(!defined ( &_VA_LIST_) || defined ( &__BSD_NET2__) || defined ( &____386BSD____) || defined ( &__bsdi__) || defined ( &__sequent__) || defined ( &__FreeBSD__) || defined( &WINNT)) {
  58.             unless(defined(&_VA_LIST_DEFINED)) {
  59.             unless(defined(&_VA_LIST)) {
  60.                 unless(defined(&_VA_LIST_T_H)) {
  61.                 unless(defined(&__va_list__)) {
  62.                 }
  63.                 }
  64.             }
  65.             }
  66.             if(!(defined ( &__BSD_NET2__) || defined ( &____386BSD____) || defined ( &__bsdi__) || defined ( &__sequent__) || defined ( &__FreeBSD__))) {
  67.             eval 'sub _VA_LIST_ () {1;}' unless defined(&_VA_LIST_);
  68.             }
  69.             unless(defined(&_VA_LIST)) {
  70.             eval 'sub _VA_LIST () {1;}' unless defined(&_VA_LIST);
  71.             }
  72.             unless(defined(&_VA_LIST_DEFINED)) {
  73.             eval 'sub _VA_LIST_DEFINED () {1;}' unless defined(&_VA_LIST_DEFINED);
  74.             }
  75.             unless(defined(&_VA_LIST_T_H)) {
  76.             eval 'sub _VA_LIST_T_H () {1;}' unless defined(&_VA_LIST_T_H);
  77.             }
  78.             unless(defined(&__va_list__)) {
  79.             eval 'sub __va_list__ () {1;}' unless defined(&__va_list__);
  80.             }
  81.         }
  82.         }
  83.     }
  84.     }
  85. }
  86. 1;
  87.